home *** CD-ROM | disk | FTP | other *** search
/ MacHome 1999 February/March / MacHome CD (February and March 1999).iso / Edutainment / INFOHIGHWAYDEMOS / demo / MENU.DCR / scripts_24.ls < prev    next >
Encoding:
Text File  |  1999-09-16  |  412 b   |  15 lines

  1. on enterFrame
  2.   set ActiveStartspr to 3
  3.   set Experimenter to ActiveStartspr
  4.   set seBrancher to ActiveStartspr + 1
  5.   set diffuser to ActiveStartspr + 2
  6.   set correspondre to ActiveStartspr + 3
  7.   set echanger to ActiveStartspr + 4
  8.   set naviguer to ActiveStartspr + 5
  9.   repeat with i = seBrancher to naviguer
  10.     set the ink of sprite i to 37
  11.   end repeat
  12.   updateStage()
  13.   depuppetize(seBrancher, naviguer)
  14. end
  15.